home *** CD-ROM | disk | FTP | other *** search
- 10 d=peek(186):ifd<8thend=8
- 20 gosub41000
- 30 load"ml move.pkd",d
- 10000 d=peek(186):n$="b.ml move
- 10001 [159]15,d,15,"s0:"[170]n$:[160]15:[148]n$,d:[128]
- 41000 [151]53280,0:[151]53281,0:[151]53272,22:[153]"load"
- 41002 [151]214,14:[153]
- 41004 [153][163]1)"list "
- 41005 [129]x[178]1[164]6
- 41006 [153][163]1)"print# "
- 41007 [130]
- 41013 [153][163]1)"poke "
- 41020 [129]x[178]1[164]4:[135]a$:[151]214,15[170]x:[153]
- 41022 [153][163]19[171][195](a$)[173]2)"print#"a$
- 41024 [130]
- 41030 t[178]ti[170]60
- 41031 [139]t[177]ti[167]41031
- 41032 [153]"":[142]
- 41050 [131]"(NULL) (NULL) (NULL) (NULL)close(NULL) val
- 41051 data"by [196]ave [205]oorman & [202]eff [202]ones
- 41052 [131]"(c) 2006 by mid$ & asc (NULL)ublishing, right$nc.
- 41053 data"www.eloadstar.com
-